home *** CD-ROM | disk | FTP | other *** search
/ Aminet 12 / Aminet 12 (1996)(GTI - Schatztruhe)[!][Jun 1996].iso / Aminet / biz / dbase / Leagues10.lha / Leagues / Install < prev    next >
Text File  |  1996-03-15  |  3KB  |  139 lines
  1. ; *******************************************************************
  2. ;
  3. ; $VER: Install_Leagues 1.0 (15.3.96)
  4. ; 
  5. ; Install script for Leagues copyright © 1996 Martin Wulffeld
  6. ;
  7. ; *******************************************************************
  8.  
  9. (set old_level @user-level)
  10. (set @default-dest "")
  11.  
  12. (set default_lang 1)
  13.  
  14. (set #bad-kick
  15. (cat "You must at least have Kickstart 2.04 to install Leagues!"
  16. ))
  17.  
  18. (set #copying-reqtoools        "\nCopying reqtools.library 38.1296 to LIBS:...")
  19. (set #copying-leagues            "\nCopying Leagues...")
  20. (set #copying-documentation    "\nCopying Leagues documentation...")
  21. (set #copying-regfiles        "\nCopying registration files...")
  22. (set #select-dest            "Please select the path where you want to install Leagues. A drawer named Leagues will be created there.")
  23. (set #select-destguide        "Please select the path where you want to install the Leagues documentation. It has already been installed along with the main program.")
  24. (set #which-language        "\nWhich languages should be installed ?\n")
  25. (set #which-language-help
  26.  (cat "\nThe Amiga can be operated in many different"
  27.       " languages. If you want Leagues to use the"
  28.       " same language as the Amiga Workbench"
  29.       " then a catalog file must be copied to your"
  30.       " harddisk for each language supported.\n\n"
  31.       "To reduce the amount of space consumed by the"
  32.       " language files, you can select to have only the"
  33.       " files of specific languages copied.\n\n"
  34.       "Simply check the boxes of the languages you wish"
  35.       " to have available on your system.\n\n"
  36.       @askoptions-help
  37. ))
  38.  
  39. ;=============================================================================
  40. ; Make sure we are running under a 2.04 ROM
  41.  
  42. (if (< (/ (getversion) 65536) 37)
  43. (
  44.     (abort #bad-kick)
  45. ))
  46.  
  47. ;=============================================================================
  48.  
  49. ;*** Required libraries
  50.  
  51. (copylib
  52.     (prompt #copying-reqtools)
  53.     (help @copylib-help)
  54.     (source "Libs/reqtools.library")
  55.     (dest "LIBS:")
  56.     (confirm)
  57. )
  58.  
  59. ;*** Leagues executable
  60.  
  61. (set programdir
  62.     (tackon
  63.         (askdir
  64.             (prompt  #select-dest)
  65.             (help @askdir-help)
  66.             (default "SYS:")
  67.             (newpath)
  68.         )
  69.         "Leagues"
  70.     )
  71. )
  72.  
  73. (makedir programdir
  74.     (infos)
  75. )
  76.  
  77. (set @default-dest programdir)
  78.  
  79. (copyfiles
  80.     (prompt #copying-leagues)
  81.     (source "Leagues")
  82.     (dest programdir)
  83.     (infos)
  84. )
  85.  
  86. ;*** Copy Catalogs to Leagues dir for backup
  87.  
  88. (copyfiles
  89.     (prompt #copying-catalogs)
  90.     (source "")
  91.     (dest programdir)
  92.     (pattern "Catalogs#?")
  93. )
  94.  
  95. ;*** Copy registration files
  96.  
  97. (copyfiles
  98.     (prompt #copying-regfiles)
  99.     (source "")
  100.     (dest programdir)
  101.     (pattern "Registration#?")
  102. )
  103.  
  104. ;*** Documentation files
  105.  
  106. ; Backup
  107.  
  108. (copyfiles
  109.     (prompt #copying-documentation)
  110.     (source "")
  111.     (dest programdir)
  112.     (pattern "Documentation#?")
  113. )
  114.  
  115. ; Ask if documentation should be installed elsewhere
  116.  
  117. (set tempdocdir
  118.     (tackon
  119.         programdir
  120.         "Documentation"
  121.     )
  122. )
  123.  
  124. (set docdir
  125.     (askdir
  126.         (prompt #select-destguide)
  127.         (help @askdir-help)
  128.         (default tempdocdir)
  129.         (newpath)
  130.     )
  131. )
  132.  
  133. (copyfiles
  134.     (prompt #copying-documentation)
  135.     (source "Documentation/Leagues.guide")
  136.     (dest docdir)
  137.     (infos)
  138. )
  139.